home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Scope / Scope Disk #058 (199x)(Scope PD)(US)[WB].zip / Scope Disk #058 (199x)(Scope PD)(US)[WB].adf / B1Subs / diskfont.bmap.sub < prev    next >
Text File  |  1989-01-24  |  170b  |  10 lines
  1.   '*** Conversion of diskfont.bmap ***
  2.  
  3.  OPEN "RAM:diskfont.bmap" for output as 1
  4.  FOR X=1 TO  34 
  5.     READ X$: A=VAL("&HO"+X$)
  6.    PRINT #1,CHR$(A);
  7.  NEXT X
  8.  CLOSE #1
  9.  
  10.